Explicitly set tab-width when collecting bindings

For some reason indent-tabs-mode doesn't use tabs with strange
tab-widths.

See https://github.com/syl20bnr/spacemacs/issues/6497

diff --git a/which-key.el b/which-key.el
index c9cd9e3b3fc6930356fb3d06487cee7568ddfdba..280212bba3c698c9a1ac6c827ae55fbc3303b4d9 100644 (file)
--- a/which-key.el
+++ b/which-key.el
@@ -1429,8 +1429,9 @@ alists. Returns a list (key separator description)."
         (ignore-keys-regexp "mouse-\\|wheel-\\|remap\\|drag-\\|scroll-bar\\|select-window\\|switch-frame\\|-state")
         (ignore-sections-regexp "\\(Key translations\\|Function key map translations\\|Input decoding map translations\\)"))
     (with-temp-buffer
-      (let ((indent-tabs-mode t))
-        (describe-buffer-bindings buffer which-key--current-prefix))
+      (setq-local indent-tabs-mode t)
+      (setq-local tab-width 8)
+      (describe-buffer-bindings buffer which-key--current-prefix)
       (goto-char (point-min))
       (let ((header-p (not (= (char-after) ?\f)))
             bindings header)